home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
pinwheel c
< prev
next >
Wrap
Text File
|
1999-06-15
|
771b
|
26 lines
Category: Filter Factory Gallery L
Title: Pinwheel C...
Author: Greg Schorno
Copyright: Copyright © Greg Schorno
ctl[0]: Spokes 1
ctl[1]: Spokes 2
ctl[2]: Operation
ctl[3]: Twist 1
ctl[4]: Twist 2
ctl[5]: Red
ctl[6]:Green
ctl[7]: Blue
val[0]: 35
val[1]: 37
val[2]: 125
val[3]: 204
val[4]: 119
val[5]: 117
val[6]: 51
val[7]: 137
R:put((d+m*val(3,-8,8))*val(0,1,24)%D,0),put((sin(get(0))+512)/4,0),put((d+m*val(4,-8,8))*val(1,1,24)%D,1),put((sin(get(1))+512)/4,1),ctl(2)&128?scl(ctl(5),64,192,min(get(0),get(1)),max(get(0),get(1))):sin(get(0)*get(1)/(32+ctl(5)))/2
G:ctl(2)&64?scl(ctl(6),64,192,min(get(0),get(1)),max(get(0),get(1))):ctl(6)*abs(get(0)-get(1))/128
B:ctl(2)&32?scl(ctl(7),64,192,min(get(0),get(1)),max(get(0),get(1))):ctl(7)*abs(get(0)-get(1))/128
A:a